home *** CD-ROM | disk | FTP | other *** search
/ PC World 2007 February / PCWorld_2007-02_cd.bin / domacnost a kancelar / pspad / pspad452inst_cz.exe / {app} / Context / MSSQL.DEF < prev    next >
Text File  |  2006-09-30  |  3KB  |  74 lines
  1. ; PSPad clip definition file for SQL (MSSQL 2000)
  2. ; author:  Fiala
  3. ; last revision 17. VII 2006  08:13
  4. ;
  5. [Macro definition]
  6. %agenda%=@C Agenda=,,ZA,CI;CL;EO;IM;LI;MI;NH;OD;OV;PF;PO;PV;SA;SE;SK;UC;UP;ZA,
  7. %table%=@E Tabulka=,,,,
  8. %table1%=@E Z tabulky=,,,,
  9. %table2%=@E Do tabulky=,,,,
  10. %field%=@E Pole=,,,,
  11. %field1%=@E Pole z (child)=,,,,
  12. %field2%=@E Pole do (master)=,,,,
  13. %fieldtype%=@E Typ pole=,,,,
  14. %default%=@E V²chozφ hodnota=,,,,
  15. %notnull%=@K Not null,not,
  16. %date1%=@D "Enter date",Date=
  17.  
  18.  
  19. [Date | this clip shows dialog and inserts date]
  20. %date1%
  21.  
  22. [Tabulka | vytvo°enφ novΘ tabulky]
  23. insert ##%agenda%_Log values('%table%', 'Nova tabulka %table%', 1, 1, 1, 0)  --%date%
  24.  
  25. /****************************************************************/
  26. if not object_id('%table%') is null
  27.     update ##ZA_LOG set JeProvadeno = 0 where Kod = '%table%'
  28. else
  29. begin
  30.     print ''
  31.     print 'Nova tabulka %table%'
  32.     Create table %table% ....
  33.     update ##%agenda%_LOG set Chyba1 = 0 where Kod = '%table%'
  34. end
  35. go
  36. if exists (select JeProvadeno from ##%agenda%_LOG where Kod = '%table%' and JeProvadeno = 1 and Chyba1 = 0)
  37. begin
  38.     print '%table% - prava pro skupinu ProgSoft'
  39.     Grant select on %table% to ProgSoft
  40.     update ##%agenda%_LOG set Chyba2 = 0 where Kod = '%table%'
  41. end
  42. go
  43. ;
  44. [Ref.integrita | vytvo°enφ referenΦnφ integrity ]
  45. insert ##%agenda%_Log values('FK_%table1%_%field1%', 'Nastaveni ciziho klice FK_%table1%_%field1% do %table2%', 1, 1, 0, 0) -- %date%
  46.  
  47. /****************************************************************/
  48. if not object_id('FK_%table1%_%field1%') is null
  49.     update ##%agenda%_LOG set JeProvadeno = 0 where Kod = 'FK_%table1%_%field1%'
  50. else
  51. begin
  52.     print ''
  53.     print 'Nastaveni ciziho klice FK_%table1%_%field1% do %table2%'
  54.     Alter table %table1% add Constraint FK_%table1%_%field1% foreign key(%field1%) references %table2% (%field2%)
  55.     update ##%agenda%_LOG set Chyba1 = 0 where Kod = 'FK_%table1%_%field1%'
  56. end
  57. go
  58.  
  59. [Pole | novß pole v tabulce]
  60. insert ##%agenda%_Log values('%table%.%field%', 'Nove pole %table%.%field%', 1, 1, 0, 0) --%date%
  61.  
  62. /****************************************************************/
  63. if (select col_length('%table%', '%field%')) is not null
  64.     update ##%agenda%_LOG set JeProvadeno = 0 where Kod = '%table%.%field%'
  65. else
  66. begin
  67.     print ''
  68.     print 'Novy sloupec %table%.%field%'
  69.     alter table %table% add %field% %fieldtype% %notnull% null constraint DF_%table%_%field% default %default%
  70.     alter table %table% drop constraint DF_%table%_%field%
  71.     update ##%agenda%_LOG set Chyba1 = 0 where Kod = '%table%.%field%'
  72. end
  73. go
  74.